#!/usr/bin/perl

#Scalars hold just single data type: string, number or perl reference

#Scalars definition in Perl

$scalar_number = -5; 
$scalar_string1 = "In PERL Scalars are always referenced with \x24 in front of each variable name. ";
$scalar_string2 = "5 items";

#Undescore can be use for big numbers 

$scalar_milion = 1_000_000;

#Print scalar values

print $scalar_number."\n";
print $scalar_string1."\n";
print $scalar_string2."\n";
print $scalar_milion."\n";

#perl scalar addition

print $scalar_number + $scalar_milion."\n"; 